home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 137
/
137.d81
/
shp slider.bas
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
485b
|
19 lines
100 rem .shp slider loader ************
110 f=f+1
120 iff=1thenf=f+1:gosub300
140 iff=2thenload"opsystem *",dv,1
160 iff=3thenload"shp slider.bin",dv,1
170 iff=4thenload"shp slider.dvc",dv,1
175 iff=5thenload"shp slider.efx",dv,1
185 rem -------------------------------
200 poke820,71: rem cheat enable...
205 rem -------------------------------
220 sys16384
300 poke53280,00:poke53281,00
310 print""chr$(8)chr$(14)
320 printtab(11)"[153] "
330 printtab(10)"[159] "
340 printtab(10)"[150] "
360 dv=peek(186):ifdv<8thendv=8
370 return